home *** CD-ROM | disk | FTP | other *** search
- object RangeInput: TRangeInput
- Left = 326
- Top = 190
- BorderIcons = []
- BorderStyle = bsSingle
- Caption = 'Integer Range Input'
- ClientHeight = 235
- ClientWidth = 353
- Font.Color = clWindowText
- Font.Height = -17
- Font.Name = 'System'
- Font.Style = []
- PixelsPerInch = 120
- Position = poScreenCenter
- OnCloseQuery = FormCloseQuery
- TextHeight = 20
- object Label1: TLabel
- Left = 55
- Top = 20
- Width = 50
- Height = 20
- Alignment = taRightJustify
- Caption = 'Name:'
- Font.Color = clBlue
- Font.Height = -17
- Font.Name = 'System'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label3: TLabel
- Left = 9
- Top = 70
- Width = 96
- Height = 20
- Alignment = taRightJustify
- Caption = 'Initial Value:'
- Font.Color = clBlue
- Font.Height = -17
- Font.Name = 'System'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label2: TLabel
- Left = 8
- Top = 120
- Width = 81
- Height = 20
- Alignment = taRightJustify
- Caption = 'Min Value:'
- Font.Color = clBlue
- Font.Height = -17
- Font.Name = 'System'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label4: TLabel
- Left = 180
- Top = 122
- Width = 85
- Height = 20
- Alignment = taRightJustify
- Caption = 'Max Value:'
- Font.Color = clBlue
- Font.Height = -17
- Font.Name = 'System'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Edit1: TEdit
- Left = 112
- Top = 15
- Width = 233
- Height = 30
- Color = clSilver
- Font.Color = clMaroon
- Font.Height = -17
- Font.Name = 'System'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 0
- end
- object Edit2: TEdit
- Left = 112
- Top = 65
- Width = 233
- Height = 30
- Color = clSilver
- Font.Color = clMaroon
- Font.Height = -17
- Font.Name = 'System'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 1
- end
- object SpinEdit1: TSpinEdit
- Left = 96
- Top = 115
- Width = 73
- Height = 39
- Color = clSilver
- Font.Color = clMaroon
- Font.Height = -17
- Font.Name = 'System'
- Font.Style = [fsBold]
- MaxLength = 5
- MaxValue = 0
- MinValue = 0
- ParentFont = False
- TabOrder = 2
- Value = 0
- end
- object SpinEdit2: TSpinEdit
- Left = 272
- Top = 115
- Width = 73
- Height = 39
- Color = clSilver
- Font.Color = clMaroon
- Font.Height = -17
- Font.Name = 'System'
- Font.Style = [fsBold]
- MaxLength = 5
- MaxValue = 0
- MinValue = 0
- ParentFont = False
- TabOrder = 3
- Value = 0
- end
- object BitBtn1: TBitBtn
- Left = 40
- Top = 176
- Width = 111
- Height = 41
- TabOrder = 4
- OnClick = BitBtn1Click
- Kind = bkOK
- end
- object BitBtn2: TBitBtn
- Left = 200
- Top = 176
- Width = 111
- Height = 41
- TabOrder = 5
- OnClick = BitBtn2Click
- Kind = bkCancel
- end
- end
-